/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / BARNET / INTERNET / ACORNET / ACORN-ST / ACRNET21 / !AcornetA_BootApps

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 01 0e f4 3e 42 6f | 6f 74 41 70 70 73 0d 00 |.....>Bo|otApps..|
|00000010| 02 21 f4 20 43 6f 70 79 | 72 69 67 68 74 20 31 39 |.!. Copy|right 19|
|00000020| 39 36 20 43 6f 6c 69 6e | 20 48 6f 67 62 65 6e 0d |96 Colin| Hogben.|
|00000030| 00 03 40 f4 20 59 6f 75 | 20 75 73 65 20 74 68 69 |..@. You| use thi|
|00000040| 73 20 63 6f 64 65 20 66 | 6f 72 20 61 6e 79 20 6e |s code f|or any n|
|00000050| 6f 6e 2d 70 72 6f 66 69 | 74 20 70 75 72 70 6f 73 |on-profi|t purpos|
|00000060| 65 2c 20 70 72 6f 76 69 | 64 65 64 20 79 6f 75 0d |e, provi|ded you.|
|00000070| 00 04 3e f4 20 64 6f 63 | 75 6d 65 6e 74 20 61 6e |..>. doc|ument an|
|00000080| 79 20 63 68 61 6e 67 65 | 73 20 6d 61 64 65 20 61 |y change|s made a|
|00000090| 6e 64 20 61 70 70 6c 79 | 20 74 68 65 20 73 61 6d |nd apply| the sam|
|000000a0| 65 20 63 6f 6e 64 69 74 | 69 6f 6e 73 2e 0d 00 05 |e condit|ions....|
|000000b0| 04 0d 00 06 31 f4 20 43 | 68 61 6e 67 65 73 20 28 |....1. C|hanges (|
|000000c0| 43 6f 70 79 72 69 67 68 | 74 20 4a 2e 48 65 65 6e |Copyrigh|t J.Heen|
|000000d0| 61 6e 2c 20 31 39 39 37 | 29 20 2d 3e 20 56 31 2e |an, 1997|) -> V1.|
|000000e0| 30 31 0d 00 07 40 f4 20 | 62 6f 6f 74 5f 66 6f 72 |01...@. |boot_for|
|000000f0| 63 65 20 6e 6f 77 20 63 | 72 65 61 74 65 73 20 61 |ce now c|reates a|
|00000100| 6e 20 65 6d 70 74 79 20 | 21 42 6f 6f 74 20 66 69 |n empty |!Boot fi|
|00000110| 6c 65 20 69 6e 20 74 68 | 65 20 66 61 6b 65 20 61 |le in th|e fake a|
|00000120| 70 70 0d 00 08 41 f4 20 | 64 69 72 65 63 74 6f 72 |pp...A. |director|
|00000130| 79 2e 20 49 66 20 74 68 | 69 73 20 69 73 6e 27 74 |y. If th|is isn't|
|00000140| 20 64 6f 6e 65 2c 20 74 | 68 65 20 66 69 6c 65 72 | done, t|he filer|
|00000150| 20 64 6f 65 73 20 6e 6f | 74 20 63 6f 75 6e 74 20 | does no|t count |
|00000160| 74 68 65 0d 00 09 15 f4 | 20 61 70 70 20 61 73 20 |the.....| app as |
|00000170| 27 62 6f 6f 74 65 64 27 | 0d 00 0a 04 0d 00 0b 13 |'booted'|........|
|00000180| f4 20 52 65 71 75 69 72 | 65 6d 65 6e 74 73 3a 0d |. Requir|ements:.|
|00000190| 00 0c 3f f4 20 28 42 31 | 29 20 41 70 70 6c 69 63 |..?. (B1|) Applic|
|000001a0| 61 74 69 6f 6e 73 20 69 | 6e 20 52 65 73 6f 75 72 |ations i|n Resour|
|000001b0| 63 65 73 20 61 6e 64 20 | 41 70 70 73 20 73 68 6f |ces and |Apps sho|
|000001c0| 75 6c 64 20 62 65 20 62 | 6f 6f 74 65 64 2e 0d 00 |uld be b|ooted...|
|000001d0| 0d 44 f4 20 28 42 32 29 | 20 49 66 20 61 6e 20 61 |.D. (B2)| If an a|
|000001e0| 70 70 20 68 61 73 20 62 | 65 65 6e 20 62 6f 6f 74 |pp has b|een boot|
|000001f0| 65 64 2f 73 65 65 6e 2f | 72 75 6e 20 65 6c 73 65 |ed/seen/|run else|
|00000200| 77 68 65 72 65 2c 20 6f | 76 65 72 72 69 64 65 20 |where, o|verride |
|00000210| 69 74 0d 00 0e 3e f4 20 | 28 42 33 29 20 49 66 20 |it...>. |(B3) If |
|00000220| 61 6e 20 61 70 70 20 69 | 73 20 73 65 65 6e 20 65 |an app i|s seen e|
|00000230| 6c 73 65 77 68 65 72 65 | 20 61 66 74 65 72 20 41 |lsewhere| after A|
|00000240| 63 6f 72 6e 65 74 20 68 | 61 73 20 62 65 65 6e 20 |cornet h|as been |
|00000250| 0d 00 0f 3f f4 20 20 20 | 20 20 20 73 74 61 72 74 |...?.   |   start|
|00000260| 65 64 2c 20 69 74 20 73 | 68 6f 75 6c 64 20 6e 6f |ed, it s|hould no|
|00000270| 74 20 6f 76 65 72 72 69 | 64 65 20 74 68 65 20 41 |t overri|de the A|
|00000280| 63 6f 72 6e 65 74 20 76 | 65 72 73 69 6f 6e 2e 0d |cornet v|ersion..|
|00000290| 00 10 42 f4 20 28 42 34 | 29 20 4e 6f 20 75 6e 6e |..B. (B4|) No unn|
|000002a0| 65 63 65 73 73 61 72 79 | 20 77 6f 72 6b 20 28 62 |ecessary| work (b|
|000002b0| 6f 6f 74 69 6e 67 29 20 | 73 68 6f 75 6c 64 20 62 |ooting) |should b|
|000002c0| 65 20 64 6f 6e 65 20 69 | 66 20 41 63 6f 72 6e 65 |e done i|f Acorne|
|000002d0| 74 0d 00 11 25 f4 20 20 | 20 20 20 20 68 61 73 20 |t...%.  |    has |
|000002e0| 61 6c 72 65 61 64 79 20 | 62 65 65 6e 20 72 75 6e |already |been run|
|000002f0| 20 6f 6e 63 65 2e 0d 00 | 12 3f f4 20 28 42 35 29 | once...|.?. (B5)|
|00000300| 20 54 68 65 20 75 73 65 | 72 20 73 68 6f 75 6c 64 | The use|r should|
|00000310| 20 62 65 20 67 69 76 65 | 6e 20 66 65 65 64 62 61 | be give|n feedba|
|00000320| 63 6b 20 6f 6e 20 74 68 | 65 20 70 72 6f 67 72 65 |ck on th|e progre|
|00000330| 73 73 20 6f 66 0d 00 13 | 1e f4 20 20 20 20 20 20 |ss of...|..      |
|00000340| 6c 65 6e 67 74 68 79 20 | 6f 70 65 72 61 74 69 6f |lengthy |operatio|
|00000350| 6e 73 2e 0d 00 14 04 0d | 00 15 44 f4 20 49 66 20 |ns......|..D. If |
|00000360| 61 20 66 69 6c 65 72 20 | 77 69 6e 64 6f 77 20 69 |a filer |window i|
|00000370| 73 20 6f 70 65 6e 65 64 | 20 28 77 69 74 68 6f 75 |s opened| (withou|
|00000380| 74 20 43 54 52 4c 29 20 | 77 68 69 63 68 20 63 6f |t CTRL) |which co|
|00000390| 6e 74 61 69 6e 73 20 21 | 61 70 70 0d 00 16 43 f4 |ntains !|app...C.|
|000003a0| 20 74 68 65 20 66 69 6c | 65 72 20 46 69 6c 65 72 | the fil|er Filer|
|000003b0| 5f 42 6f 6f 74 73 20 69 | 74 20 69 66 20 69 74 20 |_Boots i|t if it |
|000003c0| 68 61 73 20 6e 6f 74 20 | 46 69 6c 65 72 5f 42 6f |has not |Filer_Bo|
|000003d0| 6f 74 65 64 20 61 6e 20 | 61 70 70 20 6f 66 0d 00 |oted an |app of..|
|000003e0| 17 41 f4 20 74 68 65 20 | 73 61 6d 65 20 6e 61 6d |.A. the |same nam|
|000003f0| 65 20 62 65 66 6f 72 65 | 2e 20 20 46 69 6c 65 72 |e before|.  Filer|
|00000400| 5f 42 6f 6f 74 69 6e 67 | 20 6d 65 61 6e 73 20 72 |_Booting| means r|
|00000410| 75 6e 6e 69 6e 67 20 21 | 42 6f 6f 74 20 69 66 0d |unning !|Boot if.|
|00000420| 00 18 2e f4 20 70 72 65 | 73 65 6e 74 2c 20 65 6c |.... pre|sent, el|
|00000430| 73 65 20 64 6f 69 6e 67 | 20 49 63 6f 6e 53 70 72 |se doing| IconSpr|
|00000440| 69 74 65 73 20 21 53 70 | 72 69 74 65 73 0d 00 19 |ites !Sp|rites...|
|00000450| 04 0d 00 1a 40 f4 20 42 | 33 20 69 6d 70 6c 69 65 |....@. B|3 implie|
|00000460| 73 20 74 68 61 74 20 46 | 69 6c 65 72 5f 42 6f 6f |s that F|iler_Boo|
|00000470| 74 20 6d 75 73 74 20 68 | 61 76 65 20 62 65 65 6e |t must h|ave been|
|00000480| 20 72 75 6e 20 6f 6e 20 | 73 6f 6d 65 74 68 69 6e | run on |somethin|
|00000490| 67 0d 00 1b 12 f4 20 63 | 61 6c 6c 65 64 20 21 61 |g..... c|alled !a|
|000004a0| 70 70 2e 0d 00 1c 43 f4 | 20 53 6f 6d 65 20 61 70 |pp....C.| Some ap|
|000004b0| 70 73 20 65 2e 67 2e 20 | 21 53 65 72 69 61 6c 44 |ps e.g. |!SerialD|
|000004c0| 65 76 20 26 20 21 57 65 | 62 43 61 63 68 65 20 61 |ev & !We|bCache a|
|000004d0| 72 65 20 22 6d 65 65 6b | 22 20 61 6e 64 20 77 69 |re "meek|" and wi|
|000004e0| 6c 6c 20 6e 6f 74 0d 00 | 1d 3e f4 20 72 65 64 65 |ll not..|.>. rede|
|000004f0| 66 69 6e 65 20 74 68 65 | 69 72 20 73 79 73 74 65 |fine the|ir syste|
|00000500| 6d 20 76 61 72 69 61 62 | 6c 65 73 20 69 66 20 74 |m variab|les if t|
|00000510| 68 65 79 20 61 72 65 20 | 61 6c 72 65 61 64 79 20 |hey are |already |
|00000520| 73 65 74 2e 0d 00 1e 04 | 0d 00 1f 20 40 25 3d 30 |set.....|... @%=0|
|00000530| 3a ee 20 85 20 f1 20 f6 | 24 22 20 61 74 20 6c 69 |:. . . .|$" at li|
|00000540| 6e 65 20 22 9e 3a 20 e0 | 0d 00 20 04 0d 00 21 33 |ne ".: .|.. ...!3|
|00000550| c8 9b 22 41 63 6f 72 6e | 65 74 42 6f 6f 74 3a 43 |.."Acorn|etBoot:C|
|00000560| 6f 72 65 22 3a f2 63 6f | 72 65 5f 69 6e 69 74 28 |ore":.co|re_init(|
|00000570| 22 41 63 6f 72 6e 65 74 | 42 6f 6f 74 3a 22 29 0d |"Acornet|Boot:").|
|00000580| 00 22 38 74 72 61 63 65 | 5f 66 69 6c 65 24 3d 22 |."8trace|_file$="|
|00000590| 3c 41 63 6f 72 6e 65 74 | 24 44 69 72 3e 2e 62 6f |<Acornet|$Dir>.bo|
|000005a0| 6f 74 74 72 61 63 65 22 | 3a f4 20 50 52 4f 43 74 |ottrace"|:. PROCt|
|000005b0| 72 61 63 65 5f 6f 6e 0d | 00 23 14 f2 6c 69 62 72 |race_on.|.#..libr|
|000005c0| 61 72 79 28 22 77 69 6d | 70 22 29 0d 00 24 14 f2 |ary("wim|p")..$..|
|000005d0| 6c 69 62 72 61 72 79 28 | 22 66 69 6c 65 22 29 0d |library(|"file").|
|000005e0| 00 25 13 f2 6c 69 62 72 | 61 72 79 28 22 64 69 72 |.%..libr|ary("dir|
|000005f0| 22 29 0d 00 26 04 0d 00 | 27 23 74 69 74 6c 65 24 |")..&...|'#title$|
|00000600| 3d 22 41 63 6f 72 6e 65 | 74 20 49 6e 69 74 69 61 |="Acorne|t Initia|
|00000610| 6c 69 73 61 74 69 6f 6e | 22 0d 00 28 1c f2 77 69 |lisation|"..(..wi|
|00000620| 6d 70 5f 69 6e 69 74 69 | 61 6c 69 73 65 28 74 69 |mp_initi|alise(ti|
|00000630| 74 6c 65 24 29 0d 00 29 | 14 c8 99 22 48 6f 75 72 |tle$)..)|..."Hour|
|00000640| 67 6c 61 73 73 5f 4f 6e | 22 0d 00 2a 16 f2 61 74 |glass_On|"..*..at|
|00000650| 65 78 69 74 28 22 68 67 | 6f 66 66 22 2c 30 29 0d |exit("hg|off",0).|
|00000660| 00 2b 27 61 63 6f 72 6e | 65 74 5f 64 69 72 24 3d |.+'acorn|et_dir$=|
|00000670| a4 67 65 74 65 6e 76 28 | 22 41 63 6f 72 6e 65 74 |.getenv(|"Acornet|
|00000680| 24 44 69 72 22 29 0d 00 | 2c 23 64 69 72 31 24 3d |$Dir")..|,#dir1$=|
|00000690| 61 63 6f 72 6e 65 74 5f | 64 69 72 24 2b 22 2e 52 |acornet_|dir$+".R|
|000006a0| 65 73 6f 75 72 63 65 73 | 22 0d 00 2d 1e 64 69 72 |esources|"..-.dir|
|000006b0| 32 24 3d 61 63 6f 72 6e | 65 74 5f 64 69 72 24 2b |2$=acorn|et_dir$+|
|000006c0| 22 2e 41 70 70 73 22 0d | 00 2e 21 74 65 6d 70 64 |".Apps".|..!tempd|
|000006d0| 69 72 24 3d 61 63 6f 72 | 6e 65 74 5f 64 69 72 24 |ir$=acor|net_dir$|
|000006e0| 2b 22 2e 54 65 6d 70 22 | 0d 00 2f 13 f2 63 64 69 |+".Temp"|../..cdi|
|000006f0| 72 28 74 65 6d 70 64 69 | 72 24 29 0d 00 30 04 0d |r(tempdi|r$)..0..|
|00000700| 00 31 1f f4 20 43 6f 75 | 6e 74 20 68 6f 77 20 6d |.1.. Cou|nt how m|
|00000710| 61 6e 79 20 61 70 70 73 | 20 74 6f 20 64 6f 0d 00 |any apps| to do..|
|00000720| 32 0b 6e 61 70 70 25 3d | 30 0d 00 33 17 f2 62 6f |2.napp%=|0..3..bo|
|00000730| 6f 74 5f 73 63 61 6e 28 | 64 69 72 31 24 2c a3 29 |ot_scan(|dir1$,.)|
|00000740| 0d 00 34 0c 6e 61 70 70 | 25 2b 3d 31 0d 00 35 17 |..4.napp|%+=1..5.|
|00000750| f2 62 6f 6f 74 5f 73 63 | 61 6e 28 64 69 72 32 24 |.boot_sc|an(dir2$|
|00000760| 2c a3 29 0d 00 36 04 0d | 00 37 11 f4 20 4e 6f 77 |,.)..6..|.7.. Now|
|00000770| 20 64 6f 20 74 68 65 6d | 0d 00 38 0f 6e 61 70 70 | do them|..8.napp|
|00000780| 64 6f 6e 65 25 3d 30 0d | 00 39 17 f2 62 6f 6f 74 |done%=0.|.9..boot|
|00000790| 5f 73 63 61 6e 28 64 69 | 72 31 24 2c b9 29 0d 00 |_scan(di|r1$,.)..|
|000007a0| 3a 2e e7 20 a4 66 69 6c | 65 5f 65 78 69 73 74 73 |:.. .fil|e_exists|
|000007b0| 28 61 63 6f 72 6e 65 74 | 5f 64 69 72 24 2b 22 2e |(acornet|_dir$+".|
|000007c0| 21 4e 65 77 73 44 69 72 | 22 29 20 8c 0d 00 3b 38 |!NewsDir|") ...;8|
|000007d0| 20 20 20 f2 62 6f 6f 74 | 5f 61 70 70 28 61 63 6f |   .boot|_app(aco|
|000007e0| 72 6e 65 74 5f 64 69 72 | 24 2b 22 2e 21 4e 65 77 |rnet_dir|$+".!New|
|000007f0| 73 44 69 72 22 29 3a 20 | 6e 61 70 70 64 6f 6e 65 |sDir"): |nappdone|
|00000800| 25 2b 3d 31 0d 00 3c 05 | cd 0d 00 3d 17 f2 62 6f |%+=1..<.|...=..bo|
|00000810| 6f 74 5f 73 63 61 6e 28 | 64 69 72 32 24 2c b9 29 |ot_scan(|dir2$,.)|
|00000820| 0d 00 3e 04 0d 00 3f 13 | f2 77 69 6d 70 5f 63 6c |..>...?.|.wimp_cl|
|00000830| 6f 73 65 64 6f 77 6e 0d | 00 40 09 f2 65 78 69 74 |osedown.|.@..exit|
|00000840| 0d 00 41 05 e0 0d 00 42 | 04 0d 00 43 1b dd 20 f2 |..A....B|...C.. .|
|00000850| 62 6f 6f 74 5f 73 63 61 | 6e 28 64 69 72 24 2c 62 |boot_sca|n(dir$,b|
|00000860| 6f 6f 74 29 0d 00 44 12 | ea 20 64 25 2c 61 70 70 |oot)..D.|. d%,app|
|00000870| 24 2c 61 70 70 24 0d 00 | 45 16 64 25 3d a4 64 69 |$,app$..|E.d%=.di|
|00000880| 72 5f 6f 70 65 6e 28 64 | 69 72 24 29 0d 00 46 19 |r_open(d|ir$)..F.|
|00000890| c8 95 20 a4 64 69 72 5f | 72 65 61 64 28 64 25 2c |.. .dir_|read(d%,|
|000008a0| 61 70 70 24 29 0d 00 47 | 15 20 20 e7 20 97 20 61 |app$)..G|.  . . a|
|000008b0| 70 70 24 3d 97 22 21 22 | 20 8c 0d 00 48 10 20 20 |pp$=."!"| ...H.  |
|000008c0| 20 20 e7 20 62 6f 6f 74 | 20 8c 0d 00 49 22 20 20 |  . boot| ...I"  |
|000008d0| 20 20 20 20 f2 62 6f 6f | 74 5f 61 70 70 28 64 69 |    .boo|t_app(di|
|000008e0| 72 24 2b 22 2e 22 2b 61 | 70 70 24 29 0d 00 4a 09 |r$+"."+a|pp$)..J.|
|000008f0| 20 20 20 20 cc 0d 00 4b | 12 20 20 20 20 20 20 6e |    ...K|.      n|
|00000900| 61 70 70 25 2b 3d 31 0d | 00 4c 09 20 20 20 20 cd |app%+=1.|.L.    .|
|00000910| 0d 00 4d 07 20 20 cd 0d | 00 4e 05 ce 0d 00 4f 12 |..M.  ..|.N....O.|
|00000920| f2 64 69 72 5f 63 6c 6f | 73 65 28 64 25 29 0d 00 |.dir_clo|se(d%)..|
|00000930| 50 05 e1 0d 00 51 04 0d | 00 52 3e f4 20 61 70 70 |P....Q..|.R>. app|
|00000940| 6c 69 63 61 74 69 6f 6e | 20 22 62 6f 6f 74 22 20 |lication| "boot" |
|00000950| 6d 65 74 68 6f 64 20 72 | 65 74 75 72 6e 73 20 22 |method r|eturns "|
|00000960| 31 22 20 69 66 20 69 74 | 20 68 61 73 20 64 6f 6e |1" if it| has don|
|00000970| 65 20 74 68 65 0d 00 53 | 3f f4 20 62 6f 6f 74 69 |e the..S|?. booti|
|00000980| 6e 67 20 69 74 73 65 6c | 66 3b 20 22 64 69 72 20 |ng itsel|f; "dir |
|00000990| 76 61 72 6e 61 6d 65 22 | 20 77 68 69 63 68 20 6d |varname"| which m|
|000009a0| 65 61 6e 73 20 66 6f 72 | 63 65 20 61 20 62 6f 6f |eans for|ce a boo|
|000009b0| 74 20 69 66 0d 00 54 41 | f4 20 74 68 65 20 76 61 |t if..TA|. the va|
|000009c0| 72 69 61 62 6c 65 20 69 | 73 20 6e 6f 74 20 73 65 |riable i|s not se|
|000009d0| 74 20 74 6f 20 74 68 65 | 20 61 70 70 20 64 69 72 |t to the| app dir|
|000009e0| 65 63 74 6f 72 79 20 28 | 42 32 2c 42 34 29 3b 20 |ectory (|B2,B4); |
|000009f0| 6f 72 20 22 22 0d 00 55 | 3f f4 20 28 74 68 65 20 |or ""..U|?. (the |
|00000a00| 64 65 66 61 75 6c 74 20 | 69 66 20 74 68 65 20 6d |default |if the m|
|00000a10| 65 74 68 6f 64 20 69 73 | 20 75 6e 69 6d 70 6c 65 |ethod is| unimple|
|00000a20| 6d 65 6e 74 65 64 29 2e | 20 20 49 66 20 22 22 20 |mented).|  If "" |
|00000a30| 74 68 65 6e 0d 00 56 38 | f4 20 74 68 65 20 61 70 |then..V8|. the ap|
|00000a40| 70 20 69 73 20 66 6f 72 | 63 65 64 20 74 6f 20 62 |p is for|ced to b|
|00000a50| 65 20 73 79 6e 74 68 65 | 74 69 63 61 6c 6c 79 20 |e synthe|tically |
|00000a60| 62 6f 6f 74 65 64 20 28 | 42 31 29 2e 0d 00 57 18 |booted (|B1)...W.|
|00000a70| dd 20 f2 62 6f 6f 74 5f | 61 70 70 28 61 70 70 64 |. .boot_|app(appd|
|00000a80| 69 72 24 29 0d 00 58 0f | ea 20 61 70 70 24 2c 72 |ir$)..X.|. app$,r|
|00000a90| 65 74 24 0d 00 59 1b f2 | 74 72 61 63 65 28 22 42 |et$..Y..|trace("B|
|00000aa0| 6f 6f 74 20 22 2b 61 70 | 70 64 69 72 24 29 0d 00 |oot "+ap|pdir$)..|
|00000ab0| 5a 1c f4 20 53 68 6f 77 | 20 74 68 65 20 70 72 6f |Z.. Show| the pro|
|00000ac0| 67 72 65 73 73 20 28 42 | 35 29 0d 00 5b 30 c8 99 |gress (B|5)..[0..|
|00000ad0| 22 48 6f 75 72 67 6c 61 | 73 73 5f 50 65 72 63 65 |"Hourgla|ss_Perce|
|00000ae0| 6e 74 61 67 65 22 2c 6e | 61 70 70 64 6f 6e 65 25 |ntage",n|appdone%|
|00000af0| 2a 31 30 30 2f 6e 61 70 | 70 25 0d 00 5c 26 61 70 |*100/nap|p%..\&ap|
|00000b00| 70 24 3d a4 73 74 72 6c | 6f 77 65 72 28 c1 a4 6c |p$=.strl|ower(..l|
|00000b10| 65 61 66 28 61 70 70 64 | 69 72 24 29 2c 32 29 29 |eaf(appd|ir$),2))|
|00000b20| 0d 00 5d 23 72 65 74 24 | 3d a4 62 6f 6f 74 5f 6d |..]#ret$|=.boot_m|
|00000b30| 65 74 68 6f 64 28 61 70 | 70 24 2c 61 70 70 64 69 |ethod(ap|p$,appdi|
|00000b40| 72 24 29 0d 00 5e 17 e7 | 20 c0 72 65 74 24 2c 34 |r$)..^..| .ret$,4|
|00000b50| 29 3d 22 64 69 72 20 22 | 20 8c 0d 00 5f 4c 20 20 |)="dir "| ..._L  |
|00000b60| e7 20 a4 73 74 72 6c 6f | 77 65 72 28 a4 67 65 74 |. .strlo|wer(.get|
|00000b70| 65 6e 76 28 c1 72 65 74 | 24 2c 35 29 29 29 3d a4 |env(.ret|$,5)))=.|
|00000b80| 73 74 72 6c 6f 77 65 72 | 28 61 70 70 64 69 72 24 |strlower|(appdir$|
|00000b90| 29 20 8c 20 72 65 74 24 | 3d 22 31 22 20 8b 20 72 |) . ret$|="1" . r|
|00000ba0| 65 74 24 3d 22 22 0d 00 | 60 05 cd 0d 00 61 3a e7 |et$=""..|`....a:.|
|00000bb0| 20 72 65 74 24 3d 22 31 | 22 20 f2 74 72 61 63 65 | ret$="1|" .trace|
|00000bc0| 28 22 44 6f 6e 65 20 22 | 2b 61 70 70 24 29 20 8b |("Done "|+app$) .|
|00000bd0| 20 f2 62 6f 6f 74 5f 66 | 6f 72 63 65 28 61 70 70 | .boot_f|orce(app|
|00000be0| 64 69 72 24 29 0d 00 62 | 10 6e 61 70 70 64 6f 6e |dir$)..b|.nappdon|
|00000bf0| 65 25 2b 3d 31 0d 00 63 | 05 e1 0d 00 64 04 0d 00 |e%+=1..c|....d...|
|00000c00| 65 1a dd 20 f2 62 6f 6f | 74 5f 66 6f 72 63 65 28 |e.. .boo|t_force(|
|00000c10| 61 70 70 64 69 72 24 29 | 0d 00 66 0b ea 20 66 61 |appdir$)|..f.. fa|
|00000c20| 6b 65 24 0d 00 67 26 e7 | 20 a4 66 69 6c 65 5f 65 |ke$..g&.| .file_e|
|00000c30| 78 69 73 74 73 28 61 70 | 70 64 69 72 24 2b 22 2e |xists(ap|pdir$+".|
|00000c40| 21 42 6f 6f 74 22 29 20 | 8c 0d 00 68 29 20 20 f2 |!Boot") |...h)  .|
|00000c50| 74 72 61 63 65 28 22 52 | 75 6e 6e 69 6e 67 20 22 |trace("R|unning "|
|00000c60| 2b 61 70 70 64 69 72 24 | 2b 22 2e 21 42 6f 6f 74 |+appdir$|+".!Boot|
|00000c70| 22 29 0d 00 69 27 20 20 | ff 22 57 69 6d 70 54 61 |")..i'  |."WimpTa|
|00000c80| 73 6b 20 52 75 6e 20 22 | 2b 61 70 70 64 69 72 24 |sk Run "|+appdir$|
|00000c90| 2b 22 2e 21 42 6f 6f 74 | 22 0d 00 6a 05 cc 0d 00 |+".!Boot|"..j....|
|00000ca0| 6b 33 20 20 f2 74 72 61 | 63 65 28 22 49 63 6f 6e |k3  .tra|ce("Icon|
|00000cb0| 53 70 72 69 74 65 73 69 | 6e 67 20 22 2b 61 70 70 |Spritesi|ng "+app|
|00000cc0| 64 69 72 24 2b 22 2e 21 | 53 70 72 69 74 65 73 22 |dir$+".!|Sprites"|
|00000cd0| 29 0d 00 6c 29 20 20 ff | 22 49 63 6f 6e 53 70 72 |)..l)  .|"IconSpr|
|00000ce0| 69 74 65 73 20 22 2b 61 | 70 70 64 69 72 24 2b 22 |ites "+a|ppdir$+"|
|00000cf0| 2e 21 53 70 72 69 74 65 | 73 22 0d 00 6d 05 cd 0d |.!Sprite|s"..m...|
|00000d00| 00 6e 31 f4 20 46 69 6c | 65 72 5f 42 6f 6f 74 20 |.n1. Fil|er_Boot |
|00000d10| 61 20 66 61 6b 65 20 64 | 69 72 20 6f 66 20 74 68 |a fake d|ir of th|
|00000d20| 65 20 73 61 6d 65 20 6e | 61 6d 65 20 28 42 33 29 |e same n|ame (B3)|
|00000d30| 0d 00 6f 25 66 61 6b 65 | 24 3d 74 65 6d 70 64 69 |..o%fake|$=tempdi|
|00000d40| 72 24 2b 22 2e 22 2b a4 | 6c 65 61 66 28 61 70 70 |r$+"."+.|leaf(app|
|00000d50| 64 69 72 24 29 0d 00 70 | 10 f2 63 64 69 72 28 66 |dir$)..p|..cdir(f|
|00000d60| 61 6b 65 24 29 0d 00 71 | 35 ff 28 22 43 72 65 61 |ake$)..q|5.("Crea|
|00000d70| 74 65 20 22 2b 74 65 6d | 70 64 69 72 24 2b 22 2e |te "+tem|pdir$+".|
|00000d80| 22 2b a4 6c 65 61 66 28 | 61 70 70 64 69 72 24 29 |"+.leaf(|appdir$)|
|00000d90| 2b 22 2e 21 42 6f 6f 74 | 22 29 0d 00 72 3b ff 28 |+".!Boot|")..r;.(|
|00000da0| 22 53 65 74 54 79 70 65 | 20 22 2b 74 65 6d 70 64 |"SetType| "+tempd|
|00000db0| 69 72 24 2b 22 2e 22 2b | a4 6c 65 61 66 28 61 70 |ir$+"."+|.leaf(ap|
|00000dc0| 70 64 69 72 24 29 2b 22 | 2e 21 42 6f 6f 74 20 4f |pdir$)+"|.!Boot O|
|00000dd0| 62 65 79 22 29 0d 00 73 | 18 ff 22 46 69 6c 65 72 |bey")..s|.."Filer|
|00000de0| 5f 42 6f 6f 74 20 22 2b | 66 61 6b 65 24 0d 00 74 |_Boot "+|fake$..t|
|00000df0| 17 f2 66 69 6c 65 5f 72 | 65 6d 6f 76 65 28 66 61 |..file_r|emove(fa|
|00000e00| 6b 65 24 29 0d 00 75 05 | e1 0d 00 76 04 0d 00 77 |ke$)..u.|...v...w|
|00000e10| 28 f4 20 42 6f 6f 74 69 | 6e 67 20 72 75 6c 65 73 |(. Booti|ng rules|
|00000e20| 20 66 6f 72 20 65 61 63 | 68 20 61 70 70 6c 69 63 | for eac|h applic|
|00000e30| 61 74 69 6f 6e 0d 00 78 | 1d dd 20 a4 62 6f 6f 74 |ation..x|.. .boot|
|00000e40| 5f 6d 65 74 68 6f 64 28 | 61 70 70 24 2c 64 69 72 |_method(|app$,dir|
|00000e50| 24 29 0d 00 79 08 ea 20 | 61 24 0d 00 7a 0d c8 8e |$)..y.. |a$..z...|
|00000e60| 20 61 70 70 24 20 ca 0d | 00 7b 0f c9 20 22 61 72 | app$ ..|.{.. "ar|
|00000e70| 63 77 65 62 22 3a 0d 00 | 7c 29 20 20 e7 20 a4 67 |cweb":..||)  . .g|
|00000e80| 65 74 65 6e 76 28 22 41 | 72 63 57 65 62 24 44 69 |etenv("A|rcWeb$Di|
|00000e90| 72 22 29 3d 64 69 72 24 | 20 8c 20 3d 22 31 22 0d |r")=dir$| . ="1".|
|00000ea0| 00 7d 26 20 20 61 24 3d | a4 67 65 74 65 6e 76 28 |.}&  a$=|.getenv(|
|00000eb0| 22 41 6c 69 61 73 24 40 | 52 75 6e 54 79 70 65 5f |"Alias$@|RunType_|
|00000ec0| 46 41 46 22 29 0d 00 7e | 3e 20 20 f4 20 4f 6e 6c |FAF")..~|>  . Onl|
|00000ed0| 79 20 63 68 61 6e 67 65 | 20 48 54 4d 4c 20 61 63 |y change| HTML ac|
|00000ee0| 74 69 6f 6e 20 69 66 20 | 72 65 66 65 72 72 69 6e |tion if |referrin|
|00000ef0| 67 20 74 6f 20 61 6e 6f | 74 68 65 72 20 41 72 63 |g to ano|ther Arc|
|00000f00| 57 65 62 0d 00 7f 3f 20 | 20 e7 20 a7 a4 73 74 72 |Web...? | . ..str|
|00000f10| 6c 6f 77 65 72 28 61 24 | 29 2c 22 21 61 72 63 77 |lower(a$|),"!arcw|
|00000f20| 65 62 22 29 20 8c 20 ff | 22 55 6e 73 65 74 20 41 |eb") . .|"Unset A|
|00000f30| 6c 69 61 73 24 40 52 75 | 6e 54 79 70 65 5f 46 41 |lias$@Ru|nType_FA|
|00000f40| 46 22 0d 00 80 17 20 20 | f2 62 6f 6f 74 5f 66 6f |F"....  |.boot_fo|
|00000f50| 72 63 65 28 64 69 72 24 | 29 0d 00 81 0a 20 20 3d |rce(dir$|)....  =|
|00000f60| 22 31 22 0d 00 82 21 c9 | 20 22 66 69 6e 67 65 72 |"1"...!.| "finger|
|00000f70| 22 3a 20 3d 22 64 69 72 | 20 46 69 6e 67 65 72 24 |": ="dir| Finger$|
|00000f80| 44 69 72 22 0d 00 83 23 | c9 20 22 66 72 65 65 6e |Dir"...#|. "freen|
|00000f90| 65 74 22 3a 20 3d 22 64 | 69 72 20 46 72 65 65 4e |et": ="d|ir FreeN|
|00000fa0| 65 74 24 44 69 72 22 0d | 00 84 25 c9 20 22 66 72 |et$Dir".|..%. "fr|
|00000fb0| 65 65 6e 65 77 73 22 3a | 20 3d 22 64 69 72 20 46 |eenews":| ="dir F|
|00000fc0| 72 65 65 4e 65 77 73 24 | 44 69 72 22 0d 00 85 27 |reeNews$|Dir"...'|
|00000fd0| c9 20 22 66 72 65 65 73 | 6d 74 70 22 3a 20 3d 22 |. "frees|mtp": ="|
|00000fe0| 64 69 72 20 53 4d 54 50 | 53 65 72 76 65 72 24 44 |dir SMTP|Server$D|
|00000ff0| 69 72 22 0d 00 86 25 c9 | 20 22 66 72 65 65 74 65 |ir"...%.| "freete|
|00001000| 72 6d 22 3a 20 3d 22 64 | 69 72 20 46 72 65 65 54 |rm": ="d|ir FreeT|
|00001010| 65 72 6d 24 44 69 72 22 | 0d 00 87 25 c9 20 22 66 |erm$Dir"|...%. "f|
|00001020| 72 65 65 74 69 6d 65 22 | 3a 20 3d 22 64 69 72 20 |reetime"|: ="dir |
|00001030| 46 72 65 65 54 69 6d 65 | 24 44 69 72 22 0d 00 88 |FreeTime|$Dir"...|
|00001040| 25 c9 20 22 66 72 65 65 | 75 73 65 72 22 3a 20 3d |%. "free|user": =|
|00001050| 22 64 69 72 20 46 72 65 | 65 55 73 65 72 24 44 69 |"dir Fre|eUser$Di|
|00001060| 72 22 0d 00 89 21 c9 20 | 22 67 72 6f 75 70 73 22 |r"...!. |"groups"|
|00001070| 3a 20 3d 22 64 69 72 20 | 47 72 6f 75 70 73 24 44 |: ="dir |Groups$D|
|00001080| 69 72 22 0d 00 8a 27 c9 | 20 22 6d 65 73 73 65 6e |ir"...'.| "messen|
|00001090| 67 65 72 22 3a 20 3d 22 | 64 69 72 20 4d 65 73 73 |ger": ="|dir Mess|
|000010a0| 65 6e 67 65 72 24 44 69 | 72 22 0d 00 8b 25 c9 20 |enger$Di|r"...%. |
|000010b0| 22 6e 65 77 73 62 61 73 | 65 22 3a 20 3d 22 64 69 |"newsbas|e": ="di|
|000010c0| 72 20 4e 65 77 73 62 61 | 73 65 24 44 69 72 22 0d |r Newsba|se$Dir".|
|000010d0| 00 8c 10 c9 20 22 6e 65 | 77 73 64 69 72 22 3a 0d |.... "ne|wsdir":.|
|000010e0| 00 8d 55 20 20 e7 20 a4 | 67 65 74 65 6e 76 28 22 |..U  . .|getenv("|
|000010f0| 4e 65 77 73 44 69 72 24 | 44 69 72 22 29 3d 64 69 |NewsDir$|Dir")=di|
|00001100| 72 24 20 e7 20 a4 67 65 | 74 65 6e 76 28 22 55 73 |r$ . .ge|tenv("Us|
|00001110| 65 72 48 6f 6d 65 24 44 | 69 72 22 29 3d 64 69 72 |erHome$D|ir")=dir|
|00001120| 24 2b 22 2e 55 73 65 72 | 48 6f 6d 65 22 20 8c 20 |$+".User|Home" . |
|00001130| 3d 22 31 22 0d 00 8e 17 | 20 20 f2 62 6f 6f 74 5f |="1"....|  .boot_|
|00001140| 66 6f 72 63 65 28 64 69 | 72 24 29 0d 00 8f 0a 20 |force(di|r$).... |
|00001150| 20 3d 22 31 22 0d 00 90 | 27 c9 20 22 6e 65 77 73 | ="1"...|'. "news|
|00001160| 68 6f 75 6e 64 22 3a 20 | 3d 22 64 69 72 20 4e 65 |hound": |="dir Ne|
|00001170| 77 73 48 6f 75 6e 64 24 | 44 69 72 22 0d 00 91 1d |wsHound$|Dir"....|
|00001180| c9 20 22 70 69 6e 67 22 | 3a 20 3d 22 64 69 72 20 |. "ping"|: ="dir |
|00001190| 50 69 6e 67 24 44 69 72 | 22 0d 00 92 1b c9 20 22 |Ping$Dir|"..... "|
|000011a0| 70 6f 70 22 3a 20 3d 22 | 64 69 72 20 50 4f 50 24 |pop": ="|dir POP$|
|000011b0| 44 69 72 22 0d 00 93 1f | c9 20 22 71 65 64 69 74 |Dir"....|. "qedit|
|000011c0| 22 3a 20 3d 22 64 69 72 | 20 51 45 64 69 74 24 44 |": ="dir| QEdit$D|
|000011d0| 69 72 22 0d 00 94 12 c9 | 20 22 73 65 72 69 61 6c |ir".....| "serial|
|000011e0| 64 65 76 22 3a 0d 00 95 | 31 20 20 e7 20 a4 67 65 |dev":...|1  . .ge|
|000011f0| 74 65 6e 76 28 22 53 65 | 72 69 61 6c 44 65 76 24 |tenv("Se|rialDev$|
|00001200| 50 61 74 68 22 29 3d 64 | 69 72 24 2b 22 2e 22 20 |Path")=d|ir$+"." |
|00001210| 8c 20 3d 22 31 22 0d 00 | 96 1d 20 20 ff 22 55 6e |. ="1"..|..  ."Un|
|00001220| 73 65 74 20 53 65 72 69 | 61 6c 44 65 76 24 50 61 |set Seri|alDev$Pa|
|00001230| 74 68 22 0d 00 97 17 20 | 20 f2 62 6f 6f 74 5f 66 |th".... | .boot_f|
|00001240| 6f 72 63 65 28 64 69 72 | 24 29 0d 00 98 0a 20 20 |orce(dir|$)....  |
|00001250| 3d 22 31 22 0d 00 99 25 | c9 20 22 73 6c 69 70 64 |="1"...%|. "slipd|
|00001260| 69 61 6c 22 3a 20 3d 22 | 64 69 72 20 53 6c 69 70 |ial": ="|dir Slip|
|00001270| 64 69 61 6c 24 44 69 72 | 22 0d 00 9a 28 c9 20 22 |dial$Dir|"...(. "|
|00001280| 73 74 72 6f 6e 67 68 6c | 70 22 3a 20 3d 22 64 69 |stronghl|p": ="di|
|00001290| 72 20 53 74 72 6f 6e 67 | 48 65 6c 70 24 44 69 72 |r Strong|Help$Dir|
|000012a0| 22 0d 00 9b 20 c9 20 22 | 74 63 70 69 70 22 3a 20 |"... . "|tcpip": |
|000012b0| 3d 22 64 69 72 20 54 43 | 50 49 50 32 24 44 69 72 |="dir TC|PIP2$Dir|
|000012c0| 22 0d 00 9c 1d c9 20 22 | 74 74 66 6e 22 3a 20 3d |"..... "|ttfn": =|
|000012d0| 22 64 69 72 20 54 54 46 | 4e 24 44 69 72 22 0d 00 |"dir TTF|N$Dir"..|
|000012e0| 9d 11 c9 20 22 77 65 62 | 63 61 63 68 65 22 3a 0d |... "web|cache":.|
|000012f0| 00 9e 62 20 20 e7 20 a4 | 67 65 74 65 6e 76 28 22 |..b  . .|getenv("|
|00001300| 41 72 63 57 65 62 24 43 | 61 63 68 65 44 69 72 22 |ArcWeb$C|acheDir"|
|00001310| 29 3d 64 69 72 24 2b 22 | 2e 44 61 74 61 22 20 e7 |)=dir$+"|.Data" .|
|00001320| 20 a4 67 65 74 65 6e 76 | 28 22 41 72 63 57 65 62 | .getenv|("ArcWeb|
|00001330| 43 61 63 68 65 24 50 61 | 74 68 22 29 3d 64 69 72 |Cache$Pa|th")=dir|
|00001340| 24 2b 22 2e 44 61 74 61 | 2e 22 20 8c 20 3d 22 31 |$+".Data|." . ="1|
|00001350| 22 0d 00 9f 1e 20 20 ff | 22 55 6e 73 65 74 20 41 |"....  .|"Unset A|
|00001360| 72 63 57 65 62 24 41 75 | 74 68 46 69 6c 65 22 0d |rcWeb$Au|thFile".|
|00001370| 00 a0 1f 20 20 ff 22 55 | 6e 73 65 74 20 41 72 63 |...  ."U|nset Arc|
|00001380| 57 65 62 24 43 61 63 68 | 65 50 61 74 68 22 0d 00 |Web$Cach|ePath"..|
|00001390| a1 17 20 20 f2 62 6f 6f | 74 5f 66 6f 72 63 65 28 |..  .boo|t_force(|
|000013a0| 64 69 72 24 29 0d 00 a2 | 0a 20 20 3d 22 31 22 0d |dir$)...|.  ="1".|
|000013b0| 00 a3 12 c9 20 22 77 65 | 62 68 65 6c 70 65 72 22 |.... "we|bhelper"|
|000013c0| 3a 0d 00 a4 67 20 20 e7 | 20 a4 67 65 74 65 6e 76 |:...g  .| .getenv|
|000013d0| 28 22 41 72 63 57 65 62 | 24 48 65 6c 70 65 72 24 |("ArcWeb|$Helper$|
|000013e0| 44 69 72 22 29 3d 64 69 | 72 24 2b 22 2e 41 70 70 |Dir")=di|r$+".App|
|000013f0| 44 69 72 22 20 e7 20 a7 | a4 67 65 74 65 6e 76 28 |Dir" . .|.getenv(|
|00001400| 22 41 6c 69 61 73 24 41 | 72 63 57 65 62 5f 4f 70 |"Alias$A|rcWeb_Op|
|00001410| 65 6e 48 65 6c 70 65 72 | 73 22 29 2c 64 69 72 24 |enHelper|s"),dir$|
|00001420| 29 20 8c 20 3d 22 31 22 | 0d 00 a5 20 20 20 ff 22 |) . ="1"|...   ."|
|00001430| 55 6e 73 65 74 20 41 72 | 63 57 65 62 24 48 65 6c |Unset Ar|cWeb$Hel|
|00001440| 70 65 72 24 44 69 72 22 | 0d 00 a6 27 20 20 ff 22 |per$Dir"|...'  ."|
|00001450| 55 6e 73 65 74 20 41 6c | 69 61 73 24 41 72 63 57 |Unset Al|ias$ArcW|
|00001460| 65 62 5f 4f 70 65 6e 48 | 65 6c 70 65 72 73 22 0d |eb_OpenH|elpers".|
|00001470| 00 a7 17 20 20 f2 62 6f | 6f 74 5f 66 6f 72 63 65 |...  .bo|ot_force|
|00001480| 28 64 69 72 24 29 0d 00 | a8 0a 20 20 3d 22 31 22 |(dir$)..|..  ="1"|
|00001490| 0d 00 a9 05 cb 0d 00 aa | 07 3d 22 22 0d 00 ab 04 |........|.=""....|
|000014a0| 0d 00 ac 10 dd 20 a4 68 | 67 6f 66 66 28 61 25 29 |..... .h|goff(a%)|
|000014b0| 0d 00 ad 15 c8 99 22 48 | 6f 75 72 67 6c 61 73 73 |......"H|ourglass|
|000014c0| 5f 4f 66 66 22 0d 00 ae | 06 3d 30 0d ff          |_Off"...|.=0..   |
+--------+-------------------------+-------------------------+--------+--------+